home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 February / Chip_2003-02_cd1.bin / zkuste / xptools / install / Xsetup / setup.exe / {app} / plugins / XQ Win2K Network Adapter 2.xpl < prev    next >
Text File  |  2002-10-25  |  2KB  |  44 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH 1"="Network\Network Interface"
  5. "UIPATH 2"="Hardware\NIC Cards"
  6. "NAME"="Show Connection Errors"
  7. "VERSION"="1.00"
  8. "OSVERSION"="010100"
  9. "LANGUAGE"="VBScript"
  10. "TEXT 1"="Show Connection Errors in Network Properties"
  11. "DESCRIPTION 1"="To check the status of a connection, you can either click on the connection icon in the tray area or right-click the connection icon in "Network and Dial-Up Connections" and select "Status". This will normally display the speed, status, send and received bytes and some other information."
  12. "DESCRIPTION 2"="However, it does not display how many errors this connection has already had, for example through to collisions of the network."
  13. "DESCRIPTION 3"="With this tweak enabled, the status dialog will also include the errors the connection had. In this case, the new counters "Errors" will be displayed in the "Activity" group of the "General" page (right below "Packets")."
  14. "AUTHOR"="Xteq Systems"
  15. "CONTACTURL"="http://www.xteq.com/"
  16. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  17. "COMMENT 1"="Found by Pierre Szwarc in Tech Republic Newsletter 09/2002"
  18. "COMMENT 2"=""
  19.  
  20. sPath="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Network\Connections\StatMon\ShowLanErrors" 'Dword 1=enable 0=disable
  21.  
  22.  
  23. Sub Plugin_Initialize 
  24.   i=RegReadValue(sPath)
  25.   if i=1 then SetUIElement 1,true
  26. End Sub
  27.  
  28. Sub Plugin_CheckData(ElementIndex)
  29. End Sub
  30.  
  31. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  32.  b=GetUIElement(1)
  33.  if b=true then
  34.     Call RegWriteValue(sPath,1,2)
  35. else
  36.     if RegValueExists(sPath) then Call RegDeleteValue(sPath)
  37.  end if
  38.  
  39. End Sub
  40.  
  41. Sub Plugin_Terminate 
  42. End Sub
  43.  
  44.